home *** CD-ROM | disk | FTP | other *** search
- ;
- ; $VER: PowerInstaller_Installation 1.0 - By Fabio Rotondo
- ;
- ; Descr: This is just a very fast demo of PowerInstaller
- ; capabilities
- ;
-
- Define GLOBAL UserLevel 0
- Define GLOBAL DestDir "Ram:"
- Define GLOBAL Log 1
-
- BeginGUI "Install - Step 1"
- Image TOPIMAGE "gfx/head.iff"
-
- Message "Welcome to PowerInstaller!!!"
- Message " "
- Message "PowerInstaller is a brand new Installation Program"
- Message "that will help you developing and sharing installations"
- Message "in a quick and handy way."
- Message " "
- Message "PowerInstaller is also -light years- better than"
- Message "Commodore's Installer, because it is faster, with a brand"
- Message "new language and very flexible."
- Message ""
- Message "Why don't you give it a try?"
-
- Gadgets NOHELP NOPREV
-
- SetArchive "PowInst_Data.lha"
- CollectFiles
- EndGUI
-
- BeginGUI "Install - Step 2"
-
- Message "First of all, please, insert your skill about Amiga."
- Message " "
- Message "Thank you to PowerInstaller capabilities, this script"
- Message "will be able to adapt to your own knowledge."
- Message " "
- Message " "
-
- Radio "I am just a Novice"
- Radio "I know something about my Amiga"
- Radio "Hey, guys, I've written AmigaOS!"
- Radio VAR UserLevel
-
- EndGUI
-
- BeginGUI "Install - Step 3"
- SplashWindow "splash/splash1.iff" 100 0
-
-
- If $UserLevel EQUAL 0
-
- Message "Ok. You are a novice, then."
- Message " "
- Message "Well... maybe PowerInstaller could be the first"
- Message "Amiga Language you'll learn :-)"
-
- EndIF
-
- If $UserLevel EQUAL 1
-
- Message "I hope that PowerInstaller will match your needs."
- Message " "
- EndIf
-
- If $UserLevel EQUAL 2
-
- Message "Watch Everybody!!!"
- Message ""
- Message "Here we have Carl or someone like him!"
- Message "You are welcome. Hope PowerInstaller is not too simple"
- Message "for a guru like you :)"
- EndIf
-
- Message " "
- Message "Please, select Installation path."
-
- AskPath DestDir
-
- EndGUI
-
- BeginGUI "Install - Step 4"
-
- If $UserLevel EQUAL 0
- SetFiles "#?" 1
- EndIf
-
- If $UserLevel MAJOR 0
-
- Message "Please, tell me what demo scripts"
- Message "you just want to install."
- Message " "
-
- SelectFiles "#?"
- EndIf
-
- Set Gadget_Next "Next >"
- EndGUI
-
- BeginGUI "Install - Step 5"
-
- Message "PowerInstaller demo scripts"
- Message "will be installed in this directory:"
- Message " "
- Message "$DestDir"
-
- Message " "
- Message "If settings are ok, press - Install! - right now"
- Message "otherwise, you can go back make changes to your"
- Message "settings."
-
- Set Gadget_Next "- Install! -"
-
- EndGUI
-
- BeginGUI "Install - Step 6"
-
- SplashWindow "splash/splash2.iff"
-
- InstallFiles $DestDir
- EndGUI
-
- BeginGUI "Install - Step 7"
-
- Message "PowerInstall demo scripts Installation Completed!"
- Message " "
- Message "You can find some example scripts under the directory"
- Message "demoscripts/ in the $DestDir path or partition"
-
- Gadgets NOHELP NOPREV NOCANCEL
-
- Check "Save LogFile in $DestDir" Log $Log
-
- Set Gadget_Next "Bye"
- EndGUI
-
- BeginGUI "Install - Step 8"
- Define name $DestDir
-
- If $Log EQUAL 1
- AddPath name "script.log"
- EndIf
-
- SaveLog $name
- EndGUI
-
-